home *** CD-ROM | disk | FTP | other *** search
/ Disc to the Future 2 / Disc to the Future Part II Programmer's Reference (Wayzata Technology)(6013)(1992).bin / MAC / OTHER_LA / QUINTA / USERCLAS.C < prev    next >
Text File  |  1990-08-16  |  673b  |  24 lines
  1. /*
  2.  * Quinta    ⌐ 1990    Eric W. Sink
  3.  *
  4.  * This file contains functions relating to user classes
  5.  *
  6.  */
  7.  
  8. #include    "Q_includes.h"
  9.  
  10. /*--------------------------------------------------------------------*/
  11. int                         nameAmember(hclass, number, name, status)
  12.     ClassHandle                 hclass;
  13.     long                        number;
  14.     QStr                        name;
  15.     QInt                        status;
  16. {
  17.     ResponseHandle                newdict;
  18.     newdict = newresponse(RunMember, 1);
  19.     ((**((ResponseHandle) newdict)).status) = status;
  20.     ((*((**((ResponseHandle) newdict)).parms)))[0] = (MessageHandle) number;
  21.     insertresp((long) (**hclass).ClassIndex, newdict, findmessage(name, 1));
  22. }
  23. /*--------------------------------------------------------------------*/
  24.